/*
type int
parse 5 .5.
parse 5 . 5 .
parse 0 ..
parse 0 ..
*/

/* This test fixes the bug found on 2015-05-07, that dexpr() could not delete
 * an expr node that is a first child. It fails by tripping an assertion in
 * pacc. */

Sum :: int ← Dot $ a:Digit ? $ Dot → a
Digit ← [0-9] _ → { *ref_ptr(ref()) - '0' }

Dot :: void ← "." _
_ ← "\n" *
